5 DIMA(600):PRINT"[147]KONVERTER  PRINTMASTER --> TOPPRINT":PRINT"    FUER KLEINGRAFIKEN (BILDER)":PRINT"NIKOLAUS HEUSLER, 10.91  (C) 64'ER":INPUT"NAME DES PRINTMASTER-BILDES ";A$:PRINT"- BITTE WARTEN -":OPEN15,8,15,"I0":OPEN2,8,2,A$+".GRA,P,R":INPUT#15,F1,F1$,F2,F3
70 IFF1THENPRINT"DISKETTENFEHLER: "F1$:STOP
72 OPEN3,8,3,A$+".[194]I,P,W":INPUT#15,F1,F1$,F2,F3:IFF1THENPRINT"DISKETTENFEHLER: "F1$:STOP
78 PRINT#3,CHR$(160)CHR$(177);:GET#2,A$,B$:IFA$<>"P"ORB$<>CHR$(119)THENPRINT"FILEFEHLER":STOP
90 GET#2,A$:IFA$<>"X"THENPRINT"FILEFEHLER":STOP
91 GET#2,A$:IFA$THENPRINT"FILEFEHLER":STOP
92 GET#2,A$:IFA$<>"4"THENPRINT"FILEFEHLER":STOP
93 GET#2,A$:IFA$THENPRINT"FILEFEHLER":STOP
94 GET#2,A$:IFA$<>"[180]"THENPRINT"FILEFEHLER":STOP
95 GET#2,A$:IFA$<>CHR$(139)THENPRINT"FILEFEHLER":STOP
100 FORI=1TO11:GET#2,A$:A(R)=ASC(A$+CHR$(0)):S=S+A(R):R=R+1:NEXT:IFSTTHEN112
110 GET#2,A$:IFA$<>CHR$(139)THENPRINT"FILEFEHLER":STOP
112 Z=Z+1:IFS=0THENR=R-11:GOTO100
120 IFF=0THENF=1:PRINT"(BILD BEGINNT BEI ZEILE"Z"[157])
130 [139]Z[179]52[167]100
140 [129]I[178]0[164]5:[129]J[178]0[164]10:[129]K[178]0[164]7:[152]3,[199](A(K[172]11[170]I[172]88[170]J));:[130]K,J:[129]L[178]0[164]7:[152]3,[199](0);:[130]L,I:[160]3:[160]2:[160]15:[153]"OKAY.":[128]